home *** CD-ROM | disk | FTP | other *** search
/ Softdisk Supreme / Softdisk Supreme.iso / pc / DSK Files / 0-49 / SD024c.dsk / PAL.03062.VENTRE.OCT.83.A.bas < prev    next >
BASIC Source File  |  2003-06-12  |  2KB  |  33 lines
  1. 10  HOME 
  2. 20 V = 1
  3. 30 L$ = "TO ALL ADVENTURE PLAYERS"
  4. 40  POKE 34,V
  5. 50 ZZ =  LEN(L$): IF ZZ/2 < > INT(ZZ/2)  THEN L$ = L$ +" "
  6. 60 ZZ =  LEN(L$)/2
  7. 70  SPEED= 160: VTAB 23
  8. 80  FOR Z = 1 TO  LEN(L$)/2: HTAB 1: PRINT  MID$ (L$,ZZ +1 -Z,1);: HTAB 40: PRINT  MID$ (L$,ZZ +Z,1);: NEXT 
  9. 90  SPEED= 65
  10. 100  FOR Z = 1 TO 23 -V -ZZ: PRINT : NEXT 
  11. 110  SPEED= 225
  12. 120  FOR Z = 1 TO ZZ: VTAB V: HTAB 1: PRINT  MID$ (L$,ZZ +1 -Z,Z);: HTAB 41 -Z: PRINT  MID$ (L$,ZZ +1,Z);: VTAB 24: PRINT : NEXT 
  13. 130  FOR Z = 1 TO 20 -ZZ: VTAB V: HTAB Z: PRINT " "; LEFT$(L$,ZZ);: HTAB 41 -ZZ -Z: PRINT  RIGHT$(L$,ZZ);" ";: NEXT 
  14. 140  POKE 34,0
  15. 150  VTAB 6
  16. 155  HTAB 1
  17. 160  PRINT "IF ANYONE HAS RECENTLY PURCHASED THE    CHIANG BROS. RICH&FAMOUS DISK, I NEED   HELP!!"
  18. 170  VTAB 10
  19. 175  PRINT "IN THE ADVENTURE GAME (MANG-ENG) I      CAN'T SEEM TO GET PAST THE TAR PITS.    I'VE TRIED EVERYTHING BUT I CANT FIGURE IT OUT! EVEN WHEN TURNING INTO A        COCKROACH I CAN'T SOLVE IT."
  20. 180  VTAB 16
  21. 190  PRINT "IF ANYONE HAS GOTTEN PAST IT PLEASE     GIVE ME THE ANSWER IN THE NEXT ISSUE OF SOFTDISK."
  22. 200  PRINT ""
  23. 205  GET A$
  24. 206  HOME 
  25. 210  PRINT "                            SINCERELY"
  26. 220  PRINT "                      MICHAEL VENTRE"
  27. 230  PRINT "               37 WESTGATE CROSSING"
  28. 290  PRINT "                   NASUA, NH, 03062"
  29. 300  FOR X = 1 TO 3000: NEXT 
  30. 305  SPEED= 255
  31. 310  PRINT : PRINT  CHR$(4)"RUN PAL.MENU"
  32. 999  SPEED= 255
  33. 65535  REM                                                                               =========================== B. ZARRO SOFTWARE AND STUFF ALL RIGHTS RESERVED         ===========================